3' 



Appendix A 

#include <analysis.h> 
#include <ansi_c.h> 

double g_dPressureCalc (doublet], doublet], double ); 

double g_dPressureCalc (double dlntensity [] , double dCoef Array [] , double dTemperature 
{ 

int count , 
i; 

UUUJJ1C J-W^ , 

* amp, 

* deriv, 
dPressure, 
TopHalf [1024] ; 



: f J II Get Spectral Power density 

yl for (i = 0; i<1024 ; i + +) TopHalf [i] = dlntensity [1024 + i] ; 

J) 

f|j Spectrum (TopHalf, 1024); 

pi // Find the peak 

m PeakDetector (TopHalf +8, 100, 50.0, 3, 0, 1, 1, &count, &loc, 

Scamp, &deriv) ; 

if (count < 1 ) return (double) count; 
WJ // Calculate the pressure 
/^Polynomial Regression for CT20U15_C: 
I IX - A + B1*X + B2*X"2 + B3*X A 3 

//Parameter Value Error 
// 

//A 17.62138 0.31925 
l/Bl -0.50365 0.04074 
//B2 0.01343 0.00165 
//B3 -3.22463E-4 2.14632E-5 

// 

// dPressure = 17.62138 - 0.50365 * loc [0] + 0 . 01343*loc [0] *loc [0] - 3.22463E- 
4*loc [0] *loc [0] *loc [0] ; 

dPressure = dCoef Array [0] + 

dCoef Array [1] * loc [0] + 

dCoef Array [2] * loc [0] *loc [0] + 

dCoef Array [3] * loc [0] *loc [0] *loc [0] ; 

// Apply temperature correction 
//Linear Regression for DATA11_B: 
l/Y = A + B * X 



37*72^4.01 1000 -UT 

//Parameter Value Error 

// 

//A -1.39373 0.03399 
//B 0.07041 7.93589E-4 

dPressure = dPressure + dTemperature * dCoef Array [5] + dCoef Array [4] ; 
return (dPressure) ; 

} 





